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INTRODUCTION 


FOREIGN/TAPECOPY is designed to copy or list any 7 or 9 track 


tape. The program will copy the input tape to disk» printer or 


tape. Cisk and Printer output files will be in the Standard 


£10G0 format and Tape files will be an exact copy cf the inrut 


file. Cata on the tape that is bcunded Cy the specified 


cdgelimeters will be copied to a separate file. The user is 


atlowed to specify the tépe format using fnemonics tc designate 
tape marksS»e header informations data» and labels. Input 
specifications may be entered via an OQOT» remote terminal» or a 
card file. 
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OPERATING INSTRUCTIONS 


FOREIGN/TAPECOCPY uses dynamic eresory for doth tnput 2nd output 
tape buffers. This allews the prcegram to use only as such memcry 
as required. When executing FOREIGN/TAPECOPY» use enough mencry 
for an input buffer and output buffer. When using cutfut 
tlocking include the size of cone reccrd. If the ancunt of memcry 
specified is not enough the program will terminate with an 
appropriate messacee | 


SWITCHES: 
0 = 0 INPUT FROM ODT 
= 1 INPUT FROM CARDS 
7 = 0 NO ACTION | 7 
= 1-15 MESSAGE DISPLAYED FOR EACH FILE COPIED 
8 Q NO ACTICN 
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PROGRAM DUMP AT ABNORMAL TERMINATE 


Executing FOREIGN/TAPECOPY with SHC0)=1 directs the cCrogram to a 
card file» (CARDS)» which gust contain the input specificaticrs 
(see input specifications). A maximun of 20 cards 15 allowed. 


Executing FOREIGN/TAPECOPY with SNC G)= O wilt result in display of 
the following message: 


ENTER INPUT SPECIFICATIONS OR “HELP"™ 


The user shoutd enter < string of information represerting§ the 
input specifications (Csee input specifications) or “HELP™. A 
gaximum of 16C0O characters is allowed. Entering “™HELP™ will 
cause the following nessages to te displayed. The user should 
respond with the appropriate information. CSee Input 
specifications for details of input parameters.) A blank or nutl 
response will terginate the program at this pointe 


INPUT TAPE MNEMONIC? <MTx> 
QUTPUT CEVICE? <OLSK» PRINTER» TAPE> 
DEFAULT SPECIFICATIONS? <YES» NQ> 


If the user wishes to cverride the defauit valuess the fotlowing 
input messages will be displzeyed. 


Pa 


NOTE: 
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ENTER TAPE FGRMAT? V <D> EQFs He Le TMs V> 

INPUT TRANSLATION? <ASCII8,» ASCII7» EBCDIC» BCL» file-name> 
VARIABLE LENGTH RECORDS? <YES» NO> 
CUTPUT BLOCKING? 


BLOCKING FER VARIABLE RECORDS: <MAX BLOCK LENTGH> 
INPUT~QUTFUT BLOCKING: <characters per record> <records fer block> 


ENTER OPTIONS? 


<PURGE <format lList>» 
SKIPCnumber of files)>, 
INCCnumber of files)» 


axxd>» 
FIRST» COPY>s 


CCPYALL> 


A blank or nuit responses in mast cases» is equivalent to a 
"NO" answer or "NO ACTION" answer. 


If autput device is tape only the relevant specifications will 
be displayed. 
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INPUT SPECIFICATIONS 


SYNTAX 


<input specifications> 


<input tape mnemonic> 
<unit> 

<output dewaees 
<default specificaticn> 
<tape format> 


<tape format lList> 


<nusber of repeats> 


<input translatior> 


<translate filenamre> 
<input record type> 


<input-output blocking> 


<input blocking> 


<output olocking> 


<max block size> 


<input tape mnemonic> <output device> 
<default specificaticns> 
<tape format> | 
<input transtlation> <input record type> 
<irnputcroutput blocking> <apticons> 
Mi <unit> 
Ai#8@i!cC¢ tO E § ewe NEOs P 
DISK i PRINTER i PRINT I TAPE 1 <enrpty> 
DEFAULT 1 DEF 1! <erpty> 
<tape format List> |] <empty> 
<tape parts tist> 
| <tape rfrarts list> 

<number of repegts>/ 
<tzgpe parts List>/ 


<integer> ! <empty> 


ASCII7 ¢ ASCII83 1 EBCDIC § BCL 
i <translate filename> ! <empty> 


<filename> 


FIXED 1 FIX $ VARIABLE § VAR I <enpty> 


<irgut blocking> <cutput blocking> 
{ <empty> 


<gax block size> 

i <characters per record> 
<records per block> : 
i <eg#pty> 


<characters per reccrd> 
<recerds per block> 
| <egpty> , 3 


<integer> 
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<characters per recorc> 


<records per block> 


<integer> 


<digit> 


<options> 


<purge opt> 
<skip opt> 
<inc opt? 
<first opt> 


<pac opt»? 


<copy opto 


<€tape parts list> 


t 


<data part> 

<eof rpart> 
<heacer part> 
<label part> 
<tape mark part> 
<volume part> 
<nuaber of files> 
<filename> 
<packname> 
<multifile-1d> 
<filerid) 


<usercode> 
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<integer> 


<integer> 


<digit>  <digitt><irteger> 


112t3 3 «4&4 TF eee FY I 0 

<purge opt> 

<first ont> <pad opt> 

1 <skip capt> <itnce opt> <first opt> 
<pac opt> 

I<ccpy oft> 

PURGE <tape parts List> I <empty> 
SKIP <number of files> 1 <empty> 
INC <numter of files> |] <empty> 


FIRST 1! <empty> 


@<EBCDIC character><EBCDIC character>?a 
i <eapty> 


COPY §! CCPYALL ! <eapty> 

<data part> <eof part> <header part> 
<label part> <tape gark part> 

<velume part> 

D § DC<number cf blccks>) 1 <empty> 

EQF ! EOFC<nuamber cf blocks>) 1 <enpty> 
H | HC<number of blocks>) ! <empty> 

L § LC<number of blocks>) | <empty> 

TM J} TMC <number of ticcks>) 1! <enpty> 


ViY¥ (<number of blecks>) 1! <enpty> 


<integer> 


<packname>/<eultifile-id>/<file-id> 


<name> i <empty> 


<name> # <usercode> | <erpty> 


<naggteo 


(<réte>) 
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<nugber of blocks> s3= <integer> 

<nasge> s2= <lLetter><name> 

<letter> | 3t= ALB CT DLE F ance X EYE 
<empty> ss= null 

<EBCDIC character> ss= AJT-B tc i014 € 1 F { <digit> 
SEMANTICS 

The input tape mnemonic is the only required specificétion. The 


remainder are optional fut» if entered» must appear in order end 
separated by a blank. Only columns 1°72 of a card file will te 
scanned for specificétions allowing for either comments cr 
sequence numbers in cctlusgn 73-80. 


<input tape mnemonic> 


The input device gust be a system defined unit mnemonic for any 7 
or S$ track tape» e@ege "MTA". If the input device name is 
entered incorrectly the user may rerenter the appropriate device. 
If the input device is a valid device name» but not presents» the 
program will hang waiting hardware. The check of that device is 
not made until the ccrpying actually begins. There 1s no default 
value for input device. : 


<output device> 


The output may te directed to disk» or printer using the words 
"OISK™,» “PRINTER"™> cr “PRINT*. The default output device is 
CISK. ALL output files have 2 default multifilerid of “QUTPUT". 
The filenames for disk files begin with “‘FILEOC01" and «gre 


mumbered sequentially. 


Each file written to disk becomes a separate file. Fer printers,» 
one backup print file is created with “EOF” and “"EQF"™ messages 
separating the indivicual files. The print files will contain a 
header consisting of Elocking factor» filename» and input tére 
gnezonic for each file copied. The filename for a print file is 
“FILES « | 


The output may also be directed to tape to create an exact copy 
cf the input tape. Tape output is only allowed with the COPY cr 
COPYALL options. | | | 
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<default specificaticn> 


The word DEF" or "DEFAULT" is used to specify default 


specification. This enables the user ta copy an EE&CODIC tape witth 
fixed-length records to the output device. The output records 
will be unblocked with. a new file being created for data that 
exists between single tape mérks. FOFEIGN/TAPECOPY will stop 
copying when it encounters a double tape mark. If <defauitt 
specification> is used» no cther input specs are reauired. If 
“TAPE is specified as the sutput device ationg with DEFAULT» the 
"COPY" option is assufed with default blocking. "PRINT™ and 
"QOISK™ output devices assume no cptions. 


<tape format> 


FOREIGN/TAPECOPY assumes that all files are separated by single 
tape marks and the endw-of-file marker is a double tape aark. 
Since all tapes de nct follow this form» the user may specify the 
format of the tape to be copiec. The following mnemonics 4¢ére 
used to explain the tape format: 


D data portion of the tape 
EOF erd-of-fitle information 

H header tnformation 

L Label 

TM tape aark 

-V vcluge tabel 


Any mnemonic may be cptionally fcllowed by “<rumber cf blocks>" 
to specify the nugber cf blocks to be included tin that portion of 
the format. A zero block ccunt 1s not valid. FCOREIGN/TAPECCOPY 
eust still rely on tape aarks to delimit files of Informaticnr. 
The alternative to this is to specify the number of blocks for 
each porticn of the file Cspecified by 4a mnemonic) bhetween tare 
Barks. This will cause the nuaber of blocks specified to te 
placed in a separate file. | 


FORE IGN/TAPECOPY will stcp processing when it hits 2@ double tape 
fark» or on a singte tape mark immediately following an 
end=cfstape mark. If & tape does not foilow thts standards it 1s 
up to the user to specify the physical Limit of the input tape. | 
This can be accomplished be specifying <number of repeats>. If 
the number 1s too longs the user can get garbage daté or run cff 
the end of the tapeew If <numter of repeats> is specified» double 


tapewarks will not terminate the ccpy. It 15 sucgested the user 
try his format with the FIRST opticn to a printer toa check the 
correctness. For exemple a tape with ane file would have a tére 


forgat as follows: 


Vv oH & TX CO TM ECF EOF TM MN 


a 
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This. would result in the following files: 


FILEOQOO1. 


€¥ H HD 
FILECO02 CC) 
FILEO003 CEQCF EOF) 


The V HH will be placed in the same file since a block count was 
rot specified. FOREIGN/TAPECOPY ocorited the blocks until it 
reached a tapemark. 


Slashes ("/") are used to enclose the repetitive part of a tape 
forgat. A blark rsust delimit the repetitive <tape parts List> 
from the preceeding <tape parts tlList>. No space is allowed 
tetween the <number cf repeats>. and "*/"™. 


For eames. the saze tape with n files would have a tape format 
4s follows: 


Vv /K H ™M ODO TM ECF ECF TM/ 


This would result in the following files: 


FILEO001 CV H H) 
FILEOQ02 CD) 
FILE0CO3 CECF EOF) 
FILEQOQ04 CH H) 
FILEOQCOS €D) 
FILEnnnn CECF ECF) 


If the <number of repeats> wes specified for the above format» 
the result would te 


V 5/7 HH TM D TM EOF EOF TM / 


FILE0CO1 (VY H HD 
FILEOGO2 (0) 
FILEOCO3 CEQF EOF) 
FILE0004 (HH) 
FILE0005 (D0) 
FILEQO0G (EOF ECF) 
FILE0007 CH HD 
FILE0008 (D) 
FILEQCOLS (0) 
FILEOC015  CEQF EQF) 


A maximum of 40 different tape format tckens may be used With any 
one rune : : 


\ 
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<input translatior> 
The input tape may be transteted frcem BCL» ASCII-7» or ASCII-8 to 


EECOIC. $The default is ESCDIC but the user may specify 
trarsiation from ASCII-?7 and ASCII*8 for 9=-track tapes» BCL fer 


Fetreck tape or oprevide & unique transtate table. The user 


supplied translate table should appear as a system filename. Atl 
translate tables are to be created with CREATE/TABLE. FOREICGN/ 
TAPECOPY wilt took for the translate table named as 
TRANSLATE/ESBCDIC> TRANSLATE/ASCII7> TRANSLATE/ASCIIE>s 
TRANSLATE/&SCL or <trarslate filenanme> and use the second reccrd 
of that file for translation. 
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<input record type> 


An input file may have fixed or variable length reccrds. This 


may be specified ty “FIXED™» "FIX", “"VARIABLE™>» or "VAR". The 
cefault is fixed length records for input. Qutput files are 
faxed oanly. The input record type 1s used for atl files on the 
tape. 


<input blocking> <cutfut blocking> 


The blocking factors are usec to determine block and record sizes 
on the input tare and output file. If no hblockirg specs are 
crrovided» the default is untlockeds fixed length records and the 
first Block of each file determines the Length of the records. 


Blocking @ay be specified by characters per records» and records 


per block. For instances "8C 2" would be interpreted as &0 
characters per recerd and 2 records fer block. If a blocking 
factor 1s specified» it will be egprlied to all files ccpied fren 
that tape. If only one blocking specification is entered» it 
will be applied to tEoth the input and output files. 


A maximum block size is requirec for variable length input 
tlocks. The blocks» which way centain several variable cr 
fixed-length records» witl be be written to the output device as 
fixed-length records with the rececrd size as the wéexisum bicck 
size specified. The recerds will be pedded with either zercs or 
the pad character specified @sS an cption. 


If the blocksitze ts tea large or tco small for a bleck of datas a 
eessage will appear. , 


When using the “COPY* aor "COPYALL”™ cotton» a maximum block size 
will onty be used to determine the input buffer size. If a block 
1s shorter» it will be written using its actual lergth. 


\ 
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<options> 


PURGE <format List> 


The PURGE option say be used with a user specified tape format to 
indicate which parts cf the tape are not to bdDe copied. The user 
Bay specify that 2 copy of any part(s) of the tape 1s not to fe 
performed excluding tapemarks CTF). Tape marks are rot copied 
but used only as é& means of delimiting files. The optton cannot 


be used in conjunction with SKIP or INC options. 


Example: 


PURGE V 
PURGE H V EOF 


SKIP <number of files> 


The SKIP oaption is used to typass the specified nuster of files 
tefcre copying a file to the output device. A file is defined to 
te that data existing between single tape marks. The SKIP oapticn 
gust be used with the INC option to select the required porticns 
of the input tape. This option cannet be usec with a tépe 
format. A maxigum of 100 “SKIP" and “INC™ options wey be used 
with any one run. 


INC <numbter of fitles> 


The INC option specifies the number of files to be copied to the 
cutput device. A file is defined to be that cata existing 
between single tare marks. The INC option ts used tin conjunction 
with the SKIP option to select the required portions of the input 
tape. This optior carnot te used with 4 tape format. Only files 
with an INC optior with te ccpted if either the SKIP or INC 
option is used. In other words FOREIGN/TAPECCPY will step 
processing at the end of the Last SKIP or INC orgtion. 


FIRST 


The FIRST option allows the user to print only the first block cof 
eack file of the input tape. This cption is used toa identify the 
contents of the tépe. It is reccemended this ocpticn be used ta 
check correctness of the intended copy. It may only te used with 
an output device cf printer. 
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PAD 

If péedding is necessary» TAPEX will pad with ¢@CCa. A user 


selected character may be specified optionatly in the fors 
«<EECDIC character><E&CDIC character>ds where <EECCIC character> 


will be a 4-bit hexicecimal numter. This character may also te 


specified fer use in filling véeriable length hbiocks for _ fixed 
output. For exarpler if a blank is desired» the appropriate 


input would be @4C@. 


COPY 


The COPY option will provide an exact duplicate cof the input 
tape. Translaticns Elockings tape fornats» or other oaptions are 
mot alilowed and couble tape marks will terminate the copy. Input 


and output tape densities must match. 


COPYALL 


The COPYALL option will previde an exact duplicate cf the input 
tape. Translation» blocking» tape formzts» or other options are 
mot allowed and the physical ena of either the input or output 
tape to terminate the copys’ Input and output tape dersities must 
Hatch. 
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ERROR MESSAGES 


INVALID ERROR -- FROGRAM TERMINATING. 

UNKNOWN ERROR» PLEASE INPUT INFORMATION AGAIN. 
INPUT TAPE MNEMONIC REQUIRED. 

INVALID INPUT TAPE MNEMONIC. 

INVALID CUTPUT CEVICE MNENONIC. 

PLEASE ANSWER "YES" OR "NO". 

INVALIO TRANSLATICN SPECIFIED. 

NUMERIC VALUE REQUIRED FOR BLOCKING. 

TGQ MANY BLOCKING PARAMETERS SPECIFIED. 

INVALIO OPTION SPECIFIED. 

MISMATCH OF PARENTHESES. 

INVALID TAPE FORMAT MNEMONIC. 

TAPE FORMAT EXCEECS 60 MNEMONICS. 

NUMBERIC VALUE RECUIRED FOR "SKIP" AND "INC™ OPTIONS. 
INVALID PADDING CHARACTER SPECIFIEC. 

COUBLE TAPEMARKS ENCOUNTERED. 

NO CTHER INPUT SPECS ALLOWED WITH "DEFAULT™ OPTION. 
INPUT STRING EXCEEDED MAXIMUM LENGTH. | 
INPUT TAPE NOT READY» PLEASE READY UNIT. 


PARITY ERROR ON INPUT TAFE» PLEASE ENTER “YES™ TO CONTINUE. 


PROGRAM TERMINATING. 


TIMECUT ERROR AFTER 5 RETRIES. 
BLOCK SIZE TOO SMALL FOR ACTUAL CATA. CONE TIME WARNING) 
<MAXIMUM BLOCK-STIZE> REQUIRED FOR VARIABLE LENGTH RECCRODS. 


INPUT TAPE BLOCK LENGTH EXCEEDS 655283 BITS. 
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ENTER "YES" TO TRUNCATE BLOCK AND CONTINUE. 
TAPE NOT ALLOWED FOR OUTPUT DEVICE 


CYNAMIC MEMORY TOC SMALL. REsEXECUTE PROGRAM WITH MCRE DYNAMIC 
MEMCRY. : | 


BLCCK SIZE TOC LARGE FOR ACTUAL DATA. CONE TIME WARNING) 


A "TAPE FORMAT" MEY NGT BE SPECIFIED WITH “SKIP OR INC" 
CPTIONS. "SKIP OR INC™ GPTION IGNORED. 


A "TAPE FORMAT™ MUST BE SPECIFED WITH A 
"PURGE OPTION". "PURGE" OPTION IGNORED. 


INVALID INPUT/OUTFUT ELGCKING SPECIFIED. 
PROCRAM EXCEEDED AX NUMEER CF ELEFKENTS IN TAPE FORMAT. 


TAPE MARK ENCOUNTERED BEFORE NUMBER OF ELCOCKS SPECIFIED 
RERE COPIED. 


END CF TAPE ENCOUNTERED. MAY LOSE ENDING LABELS. 
FIRST BLOCK OF FILE KAS A LENGTH OF ZERO. 

USER SPECIFIED TAFE MARK NOT FOUND ON INPUT TAPE. 

SIZE OF BLOCK EXCEEDS MAXIMUM LIMIT OF €5528 BITS. 

*“FIRST"™ OPTION ALLOWED WITH "PRINTER™ OUTPUT ONLY. 

END CF INPUT TAPE ENCOUNTERED. 

END OF QUTPUT TAPE ENCGUNTERED. 

NG CATA FROM READ HEAD. 

MUST SPECIFY "COPY" GPTIONS SITH CUTPUT DEVICE “TAPE™. 
QUTPUT DEVICE "TAPFE™ MUST BE USED WITH "COPY" OPTIONS. 
PARITY ERROR ON OUTPUT TAPE» PLEASE ENTER "YES" TO CONTINUE. 


INPUT AND GUTPUT TAPE CENSITIES MUST MATCH FOR "COPY". 
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INTERNAL FILES 


perenne FILE NAME | FUNCTION 
CARES | A CAFD FILE CONTAATNING 

INPUT SPECIFICATICNS 
CUTPUTFILE MODIFIED TO APPRCPRIATE 

a GCUTPUT CEVICE 

INPUTFILE A TAFE FILE CONTAINING 

INPUT CATA 
TRANSFILE © | TRANSLATE FILE 


C) 


_ «output device> 
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